From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 29 May 1993 20:43:41 +0000 (+0000)
Subject: (cancel-function-timers): Renamed from spurious duplicate
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1^2~5^2~95793
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=046c6887bcacc226d2a9bfb3136e9ab905d9acac;p=emacs.git

(cancel-function-timers): Renamed from spurious duplicate
definition of cancel-timer.
---

diff --git a/lisp/timer.el b/lisp/timer.el
index e63f77defa0..1bfc5ec323a 100644
--- a/lisp/timer.el
+++ b/lisp/timer.el
@@ -128,9 +128,9 @@ will happen at the specified time."
       ;; Used to set timer-scratch to "", but nothing uses that var.
       (setq timer-process nil timer-alist nil))))
 
-(defun cancel-timer (function)
+(defun cancel-function-timers (function)
   "Cancel all events scheduled by `run-at-time' which would run FUNCTION."
-  (interactive "aCancel function: ")
+  (interactive "aCancel timers of function: ")
   (let ((alist timer-alist))
     (while alist
       (if (eq (nth 2 (car alist)) function)